Private Sub Test()
On Error GoTo ErrorHandler:
ErrorHandler:
End Sub
